home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 2 / Atari Mega Archive CD - Volume 2.iso / 8bit / cislib_b / star3d.bas < prev    next >
BASIC Source File  |  1995-04-22  |  2KB  |  27 lines
  1. 0 REM ** ANALOG COMPUTING ** FEB 84 ** PAGE 17 ** 
  2. 100 REM ************************ 
  3. 110 REM *    STARS 3D DEMO     * 
  4. 120 REM *  BY CRAIG PATCHETT   * 
  5. 130 REM * ANALOG COMPUTING #16 * 
  6. 140 REM ************************ 
  7. 150 REM  
  8. 160 START=14336:REM * $3800 HEX 
  9. 170 FOR I=START TO START+377 
  10. 180 READ BYTE:POKE I,BYTE:NEXT I 
  11. 190 X=USR(START) 
  12. 200 DATA 32,49,56,32,145,56,169,0,141,200,2,169,7,162,56,160,38,32,92,228,169,253,141,0,2 
  13. 210 DATA 169,56,141,1,2,169,192,141,14,212,76,35,56,32,13,57,169,0,141,173,63,76,98,228,169 
  14. 220 DATA 189,141,189,62,169,59,141,205,62,162,0,142,221,62,232,189,188,62,24,105,48,157,189,62,189 
  15. 230 DATA 204,62,105,0,157,205,62,169,0,157,221,62,232,224,16,208,229,169,189,133,204,169,59,133,205 
  16. 240 DATA 160,255,162,3,169,0,145,204,136,192,255,208,249,202,240,5,230,205,76,106,56,162,0,189,189 
  17. 250 DATA 62,133,204,189,205,62,133,205,169,64,160,0,145,204,232,224,16,208,235,96,169,119,133,204,169 
  18. 260 DATA 57,133,205,169,0,141,173,63,160,3,169,206,145,204,200,208,2,230,205,173,10,210,41,7,72 
  19. 270 DATA 170,189,111,57,174,173,63,157,237,62,104,238,173,63,10,170,173,10,210,41,63,201,48,176,247 
  20. 280 DATA 24,125,189,62,145,204,200,208,2,230,205,189,205,62,105,0,145,204,200,208,2,230,205,192,67 
  21. 290 DATA 208,189,169,65,145,204,200,169,119,145,204,141,48,2,200,169,57,145,204,141,49,2,169,35,141 
  22. 300 DATA 47,2,96,174,173,63,189,237,62,141,10,212,141,22,208,238,173,63,64,162,13,32,50,57,32 
  23. 310 DATA 50,57,162,12,32,50,57,32,50,57,202,48,17,222,87,57,208,248,32,50,57,189,99,57,157 
  24. 320 DATA 87,57,76,29,57,96,189,189,62,133,204,189,205,62,133,205,188,221,62,177,204,10,10,145,204 
  25. 330 DATA 144,15,169,1,136,192,255,208,2,160,47,145,204,152,157,221,62,96,8,8,6,6,4,4,3 
  26. 340 DATA 3,2,2,1,1,8,8,6,6,4,4,3,3,2,2,1,1,34,36,38,40,42,44,46,34,112,112,240 
  27.